-- background: 2756 from stack: in
-- bmap block id: 45748
-- flags: 0000
-- background id: 0
-- name: 
----- HyperTalk script -----
on EnterKey
  if field finder is not empty then
    push card
    get field finder
    put "" into field finder
    Find chars it
    if (number of this card < number of card "N Index") then
      if the result is empty then play "Harpsichord" c5
      put it into field finder
    end if
  end if
end EnterKey



-- part 8 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=476 top=274 right=300 bottom=505
-- title width / last selected line: 0
-- icon id / first selected line: 1012 / 1012
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  visual effect scroll right
  pop card
end mouseUp



-- part 10 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=479 top=308 right=334 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 1013 / 1013
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  visual effect wipe left
  go to next card
end mouseUp



-- part 11 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=450 top=308 right=334 bottom=477
-- title width / last selected line: 0
-- icon id / first selected line: 1014 / 1014
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  visual effect wipe right
  go to prev card
end mouseUp



-- part 12 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=477 top=17 right=42 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris close
  go home
end mouseUp




-- part 14 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=2 top=60 right=265 bottom=166
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 1 into field "Display"
  put "  " & line z of field 2 after field "Display"
  put "  " & line z of field 3 after field "Display"
end mouseDown



-- part 15 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=100 top=60 right=265 bottom=169
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 1 into field "Display"
  put "  " & line z of field 2 after field "Display"
  put "  " & line z of field 3 after field "Display"
end mouseDown



-- part 16 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=136 top=60 right=265 bottom=169
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 1 into field "Display"
  put "  " & line z of field 2 after field "Display"
  put "  " & line z of field 3 after field "Display"
end mouseDown



-- part 17 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=170 top=60 right=265 bottom=337
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 4 into field "Display"
  put "  " & line z of field 5 after field "Display"
  put "  " & line z of field 6 after field "Display"
end mouseDown



-- part 18 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=270 top=60 right=265 bottom=338
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 4 into field "Display"
  put "  " & line z of field 5 after field "Display"
  put "  " & line z of field 6 after field "Display"
end mouseDown



-- part 19 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=305 top=60 right=265 bottom=338
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 4 into field "Display"
  put "  " & line z of field 5 after field "Display"
  put "  " & line z of field 6 after field "Display"
end mouseDown



-- part 20 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=340 top=60 right=265 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 7 into field "Display"
  put "  " & line z of field 8 after field "Display"
  put "  " & line z of field 9 after field "Display"
end mouseDown



-- part 21 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=437 top=60 right=265 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 7 into field "Display"
  put "  " & line z of field 8 after field "Display"
  put "  " & line z of field 9 after field "Display"
end mouseDown



-- part 22 (field)
-- low flags: 01
-- high flags: 4002
-- rect: left=474 top=60 right=265 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseDown
  put the clickloc into y
  put 1+(item 2 of y-item 2 of the rect of the target) div (the textheight of target) into z
  put line z of field 7 into field "Display"
  put "  " & line z of field 8 after field "Display"
  put "  " & line z of field 9 after field "Display"
end mouseDown



-- part 23 (field)
-- low flags: 00
-- high flags: 0004
-- rect: left=1 top=22 right=43 bottom=190
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 24 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=214 top=22 right=41 bottom=433
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseDown
  get (line 17 of field 7)
  if it is empty then put "End" into it
  put (line 1 of field 1) && "to" && it into field 11
end mouseDown


-- part 25 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=60 top=327 right=340 bottom=72
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 4597
end mouseUp




-- part 26 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=8 top=266 right=321 bottom=38
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 3522
end mouseUp




-- part 27 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=39 top=266 right=322 bottom=59
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 3976
end mouseUp




-- part 28 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=57 top=270 right=306 bottom=85
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 4234
end mouseUp




-- part 29 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=316 right=328 bottom=75
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 3686
end mouseUp




-- part 30 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=62 top=306 right=319 bottom=83
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go to card id 2839
end mouseUp




-- part 31 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=96 top=313 right=333 bottom=159
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Index
----- HyperTalk script -----
on mouseUp
  put "N Index" into A
  get char 1 of field 10
  if it is "O" then put "N" into it
  put it into char 1 of A
  hide message window
  visual effect iris open
  go to card A
end mouseUp



-- part 43 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=108 top=272 right=304 bottom=147
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card id 6750
end mouseUp




-- part 44 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=188 top=276 right=296 bottom=258
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
  get field finder
  if it is not empty then
    push card
    put "" into field finder
    Find chars it
    if (number of this card < number of card "N Index") then
      if the result is empty then
        play "Harpsichord" tempo 380 c --e g c5
      else
        play "boing"
      end if
    end if
    put it into field finder
  end if
end mouseUp



-- part 45 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=264 top=278 right=296 bottom=395
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: finder


-- part 49 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=441 top=16 right=44 bottom=474
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  push card
  go to card id 7503
end mouseUp




-- part 50 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=179 top=314 right=331 bottom=452
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Display